home *** CD-ROM | disk | FTP | other *** search
/ Workbench Add-On / Workbench Add-On - Volume 1.iso / Dev / TileForth / bin / makeindex < prev    next >
Text File  |  1995-08-25  |  698b  |  36 lines
  1. #! /bin/sh
  2. # NAME
  3. #    makeindex - create index file for forth-83 source files
  4. # SYNOPSIS
  5. #    makeindex <files>
  6. # DESCRIPTION
  7. #    Locates and filters all definition lines in forth-83 source
  8. #
  9. # OPTIONS
  10. #    none
  11. # SEE ALSO
  12. #    tile(1), grep(1)
  13. # AUTHOR
  14. #    Mikael R.K. Patel
  15. #    Computer Aided Design Laboratory (CADLAB)
  16. #    Department of Computer and Information Science
  17. #    Linkoping University
  18. #    S-581 83 LINKOPING
  19. #    SWEDEN
  20. #    Email: mip@ida.liu.se
  21. # HISTORY
  22. #     Created on:     03 September 1990
  23. #    Lasted updated:    
  24.  
  25. if [ "$1" = "" ]
  26. then
  27.     echo "Usage:  makeindex file ..."
  28. else
  29.     egrep -n " \-\-" $* | \
  30.     egrep -v "init|does|exception|block\[ \(" | \
  31.     forth index.f83 -s index | \
  32.     egrep -v "TILE|Loading" | \
  33.     sort
  34. fi
  35.  
  36.